Global Financial Markets Dashboard

Introduction

Financial markets are complex. The objective of this dashboard is to give readers a 40,000 ft view of global financial markets in as few indicators as possible. The dashboard seeks to:

1. Avoid cognitive overload by focusing on only five indicators.

2. Illuminate big-picture trends in global financial markets.

3. Inform where readers might want to dig deeper.This dashboard is meant to anchor and inform the 15 minute trading floor meeting at the beginning of each class for Sustainable Finance: Applications and Methods at the Johns Hopkins School of Advanced International Studies (SAIS).

It is a work in progress, and will evolve & improve over time.

Indicators

• Interest Rates:
  • Fed Funds Rate
  • US 10-Year Treasury Yield-
• Risk Assets:
  • S&P 500
• Commodities:
  • Oil Prices (Brent)
• Currencies:
  • Broad USD Index

Dashboard

Interest Rates

dashboard_data %>%
  filter(date >= today()-years(5)) %>%
  filter(date >= ymd("2000-01-01")) %>%
  filter(indicator %in% c("Fed Funds Rate", "US 10yr Yield")) %>%
  mutate(weekday = lubridate::wday(date, label = TRUE)) %>%
  filter(!weekday %in% c("Sat", "Sun")) %>%
  plot_ly(x = ~date, y = ~level, hoverinfo = "text+name", text = ~paste0("Level: ", round(level,2),"%", "<br>",
                                                                    "Date: ", date)) %>%
  add_lines(width = 10, color = ~indicator, colors = c("#114B5F", "#028090"), line = list(width = 3)) %>%
  layout(xaxis = x_axis_range_options) %>%
  layout(font = list(family = "Roboto Condensed"),
         title = list(text = "<b>Interest Rates: Fed Funds Rate & 10yr UST<b>", 
                      font = list(size = 25)
                      ),
         # add a margin between the title & graph
         margin = list(t = 70),
         yaxis = list(
           title = list(
             text = "<b>Level<b>", 
             font = list(size = 16)
             ),
           ticksuffix = "%"
           )
  )

Warning: 'scatter' objects don't have these attributes: 'width'
Valid attributes include:
'cliponaxis', 'connectgaps', 'customdata', 'customdatasrc', 'dx', 'dy', 'error_x', 'error_y', 'fill', 'fillcolor', 'fillpattern', 'groupnorm', 'hoverinfo', 'hoverinfosrc', 'hoverlabel', 'hoveron', 'hovertemplate', 'hovertemplatesrc', 'hovertext', 'hovertextsrc', 'ids', 'idssrc', 'legendgroup', 'legendgrouptitle', 'legendrank', 'line', 'marker', 'meta', 'metasrc', 'mode', 'name', 'opacity', 'orientation', 'selected', 'selectedpoints', 'showlegend', 'stackgaps', 'stackgroup', 'stream', 'text', 'textfont', 'textposition', 'textpositionsrc', 'textsrc', 'texttemplate', 'texttemplatesrc', 'transforms', 'type', 'uid', 'uirevision', 'unselected', 'visible', 'x', 'x0', 'xaxis', 'xcalendar', 'xhoverformat', 'xperiod', 'xperiod0', 'xperiodalignment', 'xsrc', 'y', 'y0', 'yaxis', 'ycalendar', 'yhoverformat', 'yperiod', 'yperiod0', 'yperiodalignment', 'ysrc', 'key', 'set', 'frame', 'transforms', '_isNestedKey', '_isSimpleKey', '_isGraticule', '_bbox'

Warning: 'scatter' objects don't have these attributes: 'width'
Valid attributes include:
'cliponaxis', 'connectgaps', 'customdata', 'customdatasrc', 'dx', 'dy', 'error_x', 'error_y', 'fill', 'fillcolor', 'fillpattern', 'groupnorm', 'hoverinfo', 'hoverinfosrc', 'hoverlabel', 'hoveron', 'hovertemplate', 'hovertemplatesrc', 'hovertext', 'hovertextsrc', 'ids', 'idssrc', 'legendgroup', 'legendgrouptitle', 'legendrank', 'line', 'marker', 'meta', 'metasrc', 'mode', 'name', 'opacity', 'orientation', 'selected', 'selectedpoints', 'showlegend', 'stackgaps', 'stackgroup', 'stream', 'text', 'textfont', 'textposition', 'textpositionsrc', 'textsrc', 'texttemplate', 'texttemplatesrc', 'transforms', 'type', 'uid', 'uirevision', 'unselected', 'visible', 'x', 'x0', 'xaxis', 'xcalendar', 'xhoverformat', 'xperiod', 'xperiod0', 'xperiodalignment', 'xsrc', 'y', 'y0', 'yaxis', 'ycalendar', 'yhoverformat', 'yperiod', 'yperiod0', 'yperiodalignment', 'ysrc', 'key', 'set', 'frame', 'transforms', '_isNestedKey', '_isSimpleKey', '_isGraticule', '_bbox'